home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1998 July / EnigmA AMIGA RUN 29 (1998)(G.R. Edizioni)(IT)[!][issue 1998-07 & 08].iso / recent / warpup1.lha / WarpUP-WarpOS / Source / exceptions / fp.p < prev    next >
Text File  |  1997-06-22  |  553b  |  32 lines
  1.         incdir  include:
  2.         incdir  lvo:
  3.  
  4.         include powerpc/ppcmacros.i
  5.         include powerpc/powerpc.i
  6.  
  7.         include powerpc_lib.i
  8.  
  9.         xref    _PowerPCBase
  10.         xref    _LinkerDB
  11.         executable
  12.         oea
  13.         version 9
  14. start
  15.         prolog  1024
  16.         li      r4,HW_FPEXCON
  17.         CALLPOWERPC     SetHardware
  18.         liw     r4,FPF_EN_OVERFLOW
  19.         CALLPOWERPC     ModifyFPExc
  20.         lf      f0,fpvalue
  21.         fadd    f0,f0,f0
  22.         liw     r4,FPF_DIS_OVERFLOW
  23.         CALLPOWERPC     ModifyFPExc
  24.         li      r4,HW_FPEXCOFF
  25.         CALLPOWERPC     SetHardware
  26.         epilog
  27.  
  28.         section data
  29. fpvalue         dc.l    $7fefffff,$ffffffff
  30.  
  31.  
  32.